home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / ctlbre_1 / modapi.bas < prev    next >
Encoding:
BASIC Source File  |  1998-05-24  |  702 b   |  23 lines
  1. Attribute VB_Name = "modApi"
  2. Option Explicit
  3.  
  4. '******************************
  5. 'Bitmap
  6. '******************************
  7. Public Const SRCCOPY = &HCC0020
  8.  
  9. Public Declare Function BitBlt Lib "GDI32" (ByVal hDestDC As Long, ByVal x As Long, _
  10.     ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, _
  11.     ByVal XSrc As Long, ByVal YSrc As Long, ByVal dwRop As Long) As Long
  12.  
  13.  
  14. '******************************
  15. 'Sound
  16. '******************************
  17. Public Const SND_ASYNC = &H1
  18. Public Const SND_NODEFAULT = &H2
  19.  
  20. Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
  21.     (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
  22.  
  23.